inherited frmRel_ProdporNF: TfrmRel_ProdporNF
  Left = 450
  Top = 228
  HelpContext = 13
  Caption = 'Produtos por NF'
  ClientHeight = 573
  ClientWidth = 592
  OnClose = FormClose
  OnCreate = FormCreate
  PixelsPerInch = 96
  TextHeight = 13
  inherited Panel1: TPanel
    Width = 592
    Height = 400
    object Label1: TLabel
      Left = 25
      Top = 9
      Width = 96
      Height = 14
      Caption = 'Data de Fat. Inicial'
    end
    object Label2: TLabel
      Left = 31
      Top = 33
      Width = 90
      Height = 14
      Caption = 'Data de Fat. Final'
    end
    object btnInseriProd: TSpeedButton
      Left = 13
      Top = 168
      Width = 25
      Height = 18
      Hint = 'Insere um novo Produto na lista.'
      Flat = True
      Glyph.Data = {
        76010000424D7601000000000000760000002800000020000000100000000100
        04000000000000010000130B0000130B00001000000000000000000000000000
        800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
        FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
        33333333333FFFFFFFFF333333000000000033333377777777773333330FFFFF
        FFF03333337F333333373333330FFFFFFFF03333337F3FF3FFF73333330F00F0
        00F03333F37F773777373330330FFFFFFFF03337FF7F3F3FF3F73339030F0800
        F0F033377F7F737737373339900FFFFFFFF03FF7777F3FF3FFF70999990F00F0
        00007777777F7737777709999990FFF0FF0377777777FF37F3730999999908F0
        F033777777777337F73309999990FFF0033377777777FFF77333099999000000
        3333777777777777333333399033333333333337773333333333333903333333
        3333333773333333333333303333333333333337333333333333}
      Layout = blGlyphRight
      NumGlyphs = 2
      ParentShowHint = False
      ShowHint = True
      OnClick = btnInseriProdClick
    end
    object ggImpressao: TGauge
      Left = 1
      Top = 382
      Width = 590
      Height = 17
      Align = alBottom
      ForeColor = clMoneyGreen
      Font.Charset = ANSI_CHARSET
      Font.Color = clBlack
      Font.Height = -11
      Font.Name = 'Arial'
      Font.Style = [fsBold]
      MaxValue = 98
      ParentFont = False
      Progress = 0
    end
    object Label6: TLabel
      Left = 20
      Top = 59
      Width = 3
      Height = 14
    end
    object Label7: TLabel
      Left = 320
      Top = 8
      Width = 68
      Height = 14
      Caption = '% Comiss'#227'o'
    end
    object BtnInsereCFiscal: TSpeedButton
      Left = 13
      Top = 278
      Width = 25
      Height = 18
      Hint = 'Insere um novo hist'#243'rico na lista.'
      Flat = True
      Glyph.Data = {
        76010000424D7601000000000000760000002800000020000000100000000100
        04000000000000010000130B0000130B00001000000000000000000000000000
        800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
        FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
        33333333333FFFFFFFFF333333000000000033333377777777773333330FFFFF
        FFF03333337F333333373333330FFFFFFFF03333337F3FF3FFF73333330F00F0
        00F03333F37F773777373330330FFFFFFFF03337FF7F3F3FF3F73339030F0800
        F0F033377F7F737737373339900FFFFFFFF03FF7777F3FF3FFF70999990F00F0
        00007777777F7737777709999990FFF0FF0377777777FF37F3730999999908F0
        F033777777777337F73309999990FFF0033377777777FFF77333099999000000
        3333777777777777333333399033333333333337773333333333333903333333
        3333333773333333333333303333333333333337333333333333}
      Layout = blGlyphRight
      NumGlyphs = 2
      ParentShowHint = False
      ShowHint = True
      OnClick = BtnInsereCFiscalClick
    end
    object Label8: TLabel
      Left = 58
      Top = 281
      Width = 164
      Height = 14
      Caption = 'Relacionar os C'#243'digos Fiscais'
      Font.Charset = ANSI_CHARSET
      Font.Color = clNavy
      Font.Height = -11
      Font.Name = 'Arial'
      Font.Style = [fsBold]
      ParentFont = False
    end
    object ed_datafim: TDateEdit
      Left = 128
      Top = 31
      Width = 121
      Height = 21
      NumGlyphs = 2
      TabOrder = 1
    end
    object ed_dataini: TDateEdit
      Left = 128
      Top = 7
      Width = 121
      Height = 21
      NumGlyphs = 2
      TabOrder = 0
    end
    object ckbRelacionarProdutos: TCheckBox
      Left = 42
      Top = 169
      Width = 79
      Height = 17
      Caption = 'Produtos'
      Font.Charset = ANSI_CHARSET
      Font.Color = clNavy
      Font.Height = -11
      Font.Name = 'Arial'
      Font.Style = [fsBold]
      ParentFont = False
      TabOrder = 6
      OnClick = ckbRelacionarProdutosClick
    end
    object ListaProd: TCheckListBox
      Left = 12
      Top = 192
      Width = 565
      Height = 73
      BevelKind = bkFlat
      BorderStyle = bsNone
      Columns = 2
      Font.Charset = ANSI_CHARSET
      Font.Color = clMaroon
      Font.Height = -9
      Font.Name = 'Arial'
      Font.Style = []
      ItemHeight = 12
      ParentFont = False
      TabOrder = 7
      OnKeyDown = ListaProdKeyDown
    end
    object p_fase: TCheckListBox
      Left = 12
      Top = 77
      Width = 565
      Height = 82
      Align = alCustom
      BevelKind = bkFlat
      BorderStyle = bsNone
      Color = 16056319
      Columns = 3
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clWindowText
      Font.Height = -9
      Font.Name = 'Arial'
      Font.Style = []
      HeaderBackgroundColor = 16056319
      ItemHeight = 12
      ParentFont = False
      TabOrder = 5
    end
    object edtPercentual: TCurrencyEdit
      Left = 320
      Top = 24
      Width = 89
      Height = 21
      AutoSize = False
      DisplayFormat = '0.00 %'
      TabOrder = 2
    end
    object ckResumo: TCheckBox
      Left = 320
      Top = 48
      Width = 225
      Height = 17
      Caption = 'Imprimir resumo de produtos'
      TabOrder = 3
    end
    object ckFases: TCheckBox
      Left = 13
      Top = 59
      Width = 153
      Height = 17
      Caption = 'Fases de Processo'
      Checked = True
      State = cbChecked
      TabOrder = 4
      OnClick = ckFasesClick
    end
    object ListaCFiscal: TCheckListBox
      Left = 12
      Top = 298
      Width = 573
      Height = 79
      BevelKind = bkFlat
      BorderStyle = bsNone
      Font.Charset = ANSI_CHARSET
      Font.Color = clMaroon
      Font.Height = -9
      Font.Name = 'Arial'
      Font.Style = []
      ItemHeight = 12
      ParentFont = False
      TabOrder = 8
      OnKeyDown = ListaCFiscalKeyDown
    end
    object pnlCF: TGroupBox
      Left = 48
      Top = 41
      Width = 505
      Height = 232
      TabOrder = 9
      Visible = False
      object pnlCF1: TPanel
        Left = 2
        Top = 16
        Width = 501
        Height = 214
        Align = alClient
        BevelInner = bvLowered
        BorderWidth = 1
        Color = clSilver
        TabOrder = 0
        object Label9: TLabel
          Left = 8
          Top = 12
          Width = 123
          Height = 19
          Caption = 'C'#243'digos Fiscais'
          Font.Charset = ANSI_CHARSET
          Font.Color = clBlack
          Font.Height = -16
          Font.Name = 'Arial'
          Font.Style = [fsBold, fsUnderline]
          ParentFont = False
        end
        object dbgrdCF: TDBGrid
          Left = 3
          Top = 40
          Width = 495
          Height = 171
          Align = alBottom
          DataSource = dsCFOP
          Options = [dgTitles, dgIndicator, dgColLines, dgRowLines, dgTabs, dgConfirmDelete, dgCancelOnExit]
          ReadOnly = True
          TabOrder = 0
          TitleFont.Charset = ANSI_CHARSET
          TitleFont.Color = clWindowText
          TitleFont.Height = -11
          TitleFont.Name = 'Arial'
          TitleFont.Style = [fsBold]
          OnDblClick = dbgrdCFDblClick
          OnKeyDown = dbgrdCFKeyDown
          Columns = <
            item
              Expanded = False
              FieldName = 'Cod'
              Title.Caption = 'C'#243'digo'
              Visible = True
            end
            item
              Expanded = False
              FieldName = 'Descr'
              Title.Caption = 'Descri'#231#227'o'
              Width = 328
              Visible = True
            end>
        end
        object grpBusca: TGroupBox
          Left = 32
          Top = 147
          Width = 433
          Height = 57
          Caption = ' Informe a Descri'#231#227'o '
          Color = clWhite
          Font.Charset = ANSI_CHARSET
          Font.Color = clBlack
          Font.Height = -11
          Font.Name = 'Arial'
          Font.Style = [fsBold]
          ParentColor = False
          ParentFont = False
          TabOrder = 1
          Visible = False
          object Label10: TLabel
            Left = 200
            Top = 40
            Width = 229
            Height = 14
            Caption = ' Tecle <F5> p/ localizar por C'#243'd. ou Descr. '
            Color = clWhite
            Font.Charset = ANSI_CHARSET
            Font.Color = clBlack
            Font.Height = -11
            Font.Name = 'Arial'
            Font.Style = [fsBold]
            ParentColor = False
            ParentFont = False
          end
          object edNome: TEdit
            Left = 8
            Top = 16
            Width = 417
            Height = 22
            BevelKind = bkFlat
            BorderStyle = bsNone
            CharCase = ecUpperCase
            Font.Charset = ANSI_CHARSET
            Font.Color = clBlack
            Font.Height = -11
            Font.Name = 'Arial'
            Font.Style = [fsBold]
            ParentFont = False
            TabOrder = 0
            OnKeyDown = edNomeKeyDown
          end
        end
        object Panel6: TPanel
          Left = 243
          Top = 44
          Width = 185
          Height = 14
          Alignment = taRightJustify
          BevelOuter = bvNone
          Caption = '<F2> p/ localizar'
          Font.Charset = ANSI_CHARSET
          Font.Color = clRed
          Font.Height = -11
          Font.Name = 'Arial'
          Font.Style = [fsBold]
          ParentFont = False
          TabOrder = 2
        end
        object BitBtn2: TBitBtn
          Left = 404
          Top = 10
          Width = 75
          Height = 25
          Caption = '&Fechar'
          TabOrder = 3
          OnClick = BitBtn2Click
          Glyph.Data = {
            DE010000424DDE01000000000000760000002800000024000000120000000100
            0400000000006801000000000000000000001000000000000000000000000000
            8000008000000080800080000000800080008080000080808000C0C0C0000000
            FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00377777777788
            F8F878F7777777777333333F00004444400777FFF444447777777777F333FF7F
            000033334D5008FFF4333377777777773337777F0000333345D50FFFF4333333
            337F777F3337F33F000033334D5D0FFFF43333333377877F3337F33F00003333
            45D50FEFE4333333337F787F3337F33F000033334D5D0FFFF43333333377877F
            3337F33F0000333345D50FEFE4333333337F787F3337F33F000033334D5D0FFF
            F43333333377877F3337F33F0000333345D50FEFE4333333337F787F3337F33F
            000033334D5D0EFEF43333333377877F3337F33F0000333345D50FEFE4333333
            337F787F3337F33F000033334D5D0EFEF43333333377877F3337F33F00003333
            4444444444333333337F7F7FFFF7F33F00003333333333333333333333777777
            7777333F00003333330000003333333333333FFFFFF3333F00003333330AAAA0
            333333333333777777F3333F00003333330000003333333333337FFFF7F3333F
            0000}
          NumGlyphs = 2
        end
      end
    end
    object ckTodosCFOP: TCheckBox
      Left = 40
      Top = 280
      Width = 17
      Height = 17
      TabStop = False
      Checked = True
      State = cbChecked
      TabOrder = 10
      OnClick = ckTodosCFOPClick
    end
  end
  inherited Panel2: TPanel
    Top = 506
    Width = 592
    inherited btncancelar1: TBitBtn
      Left = 246
    end
    inherited btnfechar1: TBitBtn
      Left = 484
    end
    inherited bimprimir: TFlatButton
      Enabled = True
      OnClick = bimprimirClick
    end
    inherited btncancelar: TFlatButton
      Left = 240
    end
    inherited btnfechar: TFlatButton
      Left = 472
    end
  end
  inherited sb: TStatusBar
    Top = 554
    Width = 592
  end
  inherited Panel3: TPanel
    Width = 592
    inherited ListaEmp: TCheckListBox
      Width = 569
    end
  end
  object pnlProd: TGroupBox [4]
    Left = 583
    Top = 72
    Width = 517
    Height = 286
    Caption = ' '
    TabOrder = 4
    Visible = False
    object pnlProd1: TPanel
      Left = 2
      Top = 6
      Width = 513
      Height = 278
      BevelInner = bvLowered
      BorderWidth = 1
      Color = clGray
      TabOrder = 0
      object Shape1: TShape
        Left = 3
        Top = 40
        Width = 507
        Height = 0
        Align = alClient
      end
      object Panel5: TPanel
        Left = 3
        Top = 3
        Width = 507
        Height = 37
        Align = alTop
        TabOrder = 0
        object Shape2: TShape
          Left = 296
          Top = 4
          Width = 124
          Height = 26
          Brush.Color = 9671571
          Pen.Color = clWhite
        end
        object Label3: TLabel
          Left = 8
          Top = 8
          Width = 71
          Height = 19
          Caption = 'Produtos'
          Font.Charset = ANSI_CHARSET
          Font.Color = clBlack
          Font.Height = -16
          Font.Name = 'Arial'
          Font.Style = [fsBold, fsUnderline]
          ParentFont = False
        end
        object SpeedButton1: TSpeedButton
          Left = 296
          Top = 6
          Width = 123
          Height = 25
          Caption = 'Adicionar Todos'
          Flat = True
          Font.Charset = ANSI_CHARSET
          Font.Color = clWindowText
          Font.Height = -11
          Font.Name = 'Arial'
          Font.Style = [fsBold, fsUnderline]
          Glyph.Data = {
            76010000424D7601000000000000760000002800000020000000100000000100
            04000000000000010000120B0000120B00001000000000000000000000000000
            800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
            FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00555555555555
            555555555555555555555555555555555555555555FF55555555555559055555
            55555555577FF5555555555599905555555555557777F5555555555599905555
            555555557777FF5555555559999905555555555777777F555555559999990555
            5555557777777FF5555557990599905555555777757777F55555790555599055
            55557775555777FF5555555555599905555555555557777F5555555555559905
            555555555555777FF5555555555559905555555555555777FF55555555555579
            05555555555555777FF5555555555557905555555555555777FF555555555555
            5990555555555555577755555555555555555555555555555555}
          NumGlyphs = 2
          ParentFont = False
          OnClick = SpeedButton1Click
        end
        object BitBtn1: TBitBtn
          Left = 428
          Top = 6
          Width = 75
          Height = 25
          Caption = '&Fechar'
          TabOrder = 0
          OnClick = BitBtn1Click
          Glyph.Data = {
            DE010000424DDE01000000000000760000002800000024000000120000000100
            0400000000006801000000000000000000001000000000000000000000000000
            8000008000000080800080000000800080008080000080808000C0C0C0000000
            FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00377777777788
            F8F878F7777777777333333F00004444400777FFF444447777777777F333FF7F
            000033334D5008FFF4333377777777773337777F0000333345D50FFFF4333333
            337F777F3337F33F000033334D5D0FFFF43333333377877F3337F33F00003333
            45D50FEFE4333333337F787F3337F33F000033334D5D0FFFF43333333377877F
            3337F33F0000333345D50FEFE4333333337F787F3337F33F000033334D5D0FFF
            F43333333377877F3337F33F0000333345D50FEFE4333333337F787F3337F33F
            000033334D5D0EFEF43333333377877F3337F33F0000333345D50FEFE4333333
            337F787F3337F33F000033334D5D0EFEF43333333377877F3337F33F00003333
            4444444444333333337F7F7FFFF7F33F00003333333333333333333333777777
            7777333F00003333330000003333333333333FFFFFF3333F00003333330AAAA0
            333333333333777777F3333F00003333330000003333333333337FFFF7F3333F
            0000}
          NumGlyphs = 2
        end
        object rgOrdem: TRadioGroup
          Left = 88
          Top = -1
          Width = 201
          Height = 33
          Caption = 'Ordernar'
          Columns = 2
          Font.Charset = ANSI_CHARSET
          Font.Color = clBlack
          Font.Height = -11
          Font.Name = 'Arial'
          Font.Style = [fsBold]
          ItemIndex = 0
          Items.Strings = (
            'C'#243'digo'
            'Descri'#231#227'o')
          ParentFont = False
          TabOrder = 1
          OnClick = rgOrdemClick
        end
      end
      object dbgrdProd: TDBGrid
        Left = 3
        Top = 40
        Width = 507
        Height = 235
        Align = alBottom
        DataSource = dtsrcProd
        Options = [dgTitles, dgIndicator, dgColLines, dgRowLines, dgTabs, dgConfirmDelete, dgCancelOnExit]
        ReadOnly = True
        TabOrder = 1
        TitleFont.Charset = DEFAULT_CHARSET
        TitleFont.Color = clWindowText
        TitleFont.Height = -11
        TitleFont.Name = 'MS Sans Serif'
        TitleFont.Style = []
        OnDblClick = dbgrdProdDblClick
        OnKeyDown = dbgrdProdKeyDown
        Columns = <
          item
            Expanded = False
            FieldName = 'Cod'
            Title.Caption = 'C'#243'digo'
            Width = 111
            Visible = True
          end
          item
            Expanded = False
            FieldName = 'Descr'
            Title.Caption = 'Descri'#231#227'o'
            Width = 356
            Visible = True
          end>
      end
      object Panel4: TPanel
        Left = 295
        Top = 44
        Width = 185
        Height = 14
        Alignment = taRightJustify
        BevelOuter = bvNone
        Caption = '<F2> p/ localizar'
        Font.Charset = ANSI_CHARSET
        Font.Color = clRed
        Font.Height = -11
        Font.Name = 'Arial'
        Font.Style = [fsBold]
        ParentFont = False
        TabOrder = 2
      end
      object grpBuscaProd: TGroupBox
        Left = 32
        Top = 212
        Width = 433
        Height = 57
        Caption = ' Informe a Descri'#231#227'o '
        Font.Charset = ANSI_CHARSET
        Font.Color = clWindowText
        Font.Height = -11
        Font.Name = 'Arial'
        Font.Style = [fsBold]
        ParentFont = False
        TabOrder = 3
        Visible = False
        object Label5: TLabel
          Left = 200
          Top = 40
          Width = 229
          Height = 14
          Caption = ' Tecle <F5> p/ localizar por C'#243'd. ou Descr. '
          Font.Charset = ANSI_CHARSET
          Font.Color = clWindowText
          Font.Height = -11
          Font.Name = 'Arial'
          Font.Style = [fsBold]
          ParentFont = False
        end
        object edNomeProd: TEdit
          Left = 8
          Top = 16
          Width = 417
          Height = 22
          CharCase = ecUpperCase
          Font.Charset = ANSI_CHARSET
          Font.Color = clBlack
          Font.Height = -11
          Font.Name = 'Arial'
          Font.Style = [fsBold]
          ParentFont = False
          TabOrder = 0
          OnKeyDown = edNomeProdKeyDown
        end
      end
    end
  end
  object dtsrcProd: TDataSource
    DataSet = CDSProd
    Left = 460
    Top = 40
  end
  object CDSProd: TClientDataSet
    Aggregates = <>
    Params = <>
    Left = 488
    Top = 40
    object CDSProdCod: TStringField
      DisplayWidth = 15
      FieldName = 'Cod'
    end
    object CDSProdDescr: TStringField
      FieldName = 'Descr'
      Size = 40
    end
  end
  object CDSInserir: TClientDataSet
    Aggregates = <>
    Params = <>
    Left = 484
    Top = 72
    object CDSInserirCod: TStringField
      FieldName = 'Cod'
    end
  end
  object CDS: TClientDataSet
    Aggregates = <>
    Params = <>
    Left = 288
    Top = 232
    object CDSNota: TStringField
      FieldName = 'Nota'
      Size = 9
    end
    object CDSProduto: TStringField
      FieldName = 'Produto'
      Size = 50
    end
    object CDSQtde: TFloatField
      FieldName = 'Qtde'
    end
    object CDSVlrUnit: TFloatField
      FieldName = 'VlrUnit'
    end
    object CDSVlrTotal: TFloatField
      FieldName = 'VlrTotal'
    end
  end
  object RES: TClientDataSet
    Aggregates = <>
    Params = <>
    Left = 448
    Top = 138
    object RESProduto: TStringField
      FieldName = 'Produto'
      Size = 50
    end
    object RESQtde: TFloatField
      FieldName = 'Qtde'
    end
    object RESVlrUnit: TFloatField
      FieldName = 'VlrUnit'
    end
    object RESVlrTotal: TFloatField
      FieldName = 'VlrTotal'
    end
    object RESComissao: TFloatField
      FieldName = 'Comissao'
    end
  end
  object dsCFOP: TDataSource
    DataSet = CDS_CFOP
    Left = 240
    Top = 72
  end
  object CDS_CFOP: TClientDataSet
    Aggregates = <>
    Params = <>
    Left = 312
    Top = 4
    object CDS_CFOPCod: TStringField
      FieldName = 'Cod'
    end
    object CDS_CFOPDescr: TStringField
      FieldName = 'Descr'
      Size = 40
    end
  end
end
